home *** CD-ROM | disk | FTP | other *** search
- set audreyeII(color) {1.0 0.0 0.0}
- set audreyeII(radius) 1.0
-
- set audreyeII(thetaMax) 270.0
-
- # this gives it a nice goofy look
- set audreyeII(volumePreservingScaleFactor) .875
-
- set xT 0
- set yT .3
- set zT 0
- set xR 0
- set yR 38
- set zR 0
-
- set eyeBall(irisColor) {.389981 .305734 .78196}
- set eyeBall(irisSize) .12
- set eyeBall(pupilSize) .05
- set eyeBall(bloodShot) .85
-
- set eyeBall(upDownR) 0.5
- proc rotateEyeBallUpDown {u min max} { Rotate [expr {lerpDown($u, $min, $max)}] 1 0 0 }
-
- set eyeBall(leftRightR) 0.5
- set eyeBall(leftRightRMin) -45
- set eyeBall(leftRightRMax) 45
- proc rotateEyeBallLeftRight {u min max} { Rotate [expr {lerpDown($u, $min, $max)}] 0 1 0 }
-
- set eyeBall(openCloseR) 0
- set eyeBall(openCloseRMin) 270
- set eyeBall(openCloseRMax) 360
-
-
-
- set spotLight(xT) 0
- set spotLight(yT) 1
- set spotLight(zT) -3
- set spotLight(xR) 40
- set spotLight(yR) 0
- set spotLight(coneAngleInDegrees) 85
- set spotLight(intensity) 10
- set spotLight(coneangle) [expr {radians($spotLight(coneAngleInDegrees))}]; # this will be reset as an EveCmd
- set spotLight(conedeltaangle) [expr {$spotLight(coneangle)/3.}]; # this will be reset as an EveCmd
- EveCmd {set spotLight(coneangle) [expr {radians($spotLight(coneAngleInDegrees))}]}
- EveCmd {set spotLight(conedeltaangle) [expr {$spotLight(coneangle)/3.}]}
-
- set text(fontName) Helvetica
- set text(line1Color) {1 1 1}
- set text(line1) {}
- set text(line2Color) {1 1 1}
- set text(line2) {}
- set text(size) 16
- set text(xT) -1.8
- set text(yT) -.85
- set text(zT) 0
- set text(xR) 0
- set text(yR) 0
- set text(zR) 0
-